home *** CD-ROM | disk | FTP | other *** search
/ Clinical Endocrinology / Clinical Endocrinology.iso / pc / 00000000 / history.dir / 00008_Script_8 < prev    next >
Text File  |  1995-11-09  |  314b  |  15 lines

  1. -- Just hilites the line clicked on and stores the
  2. -- line number of the new selection.
  3.  
  4. on mouseUp
  5.   global lineSelected
  6.   put the mouseLine into theLine
  7.   
  8.   if the mouseLine > 0 then
  9.     set lineSelected = theLine
  10.     hilite line theLine of field "History Field"
  11.     updateStage
  12.   end if
  13.   
  14.   
  15. end